object DictBox: TDictBox
  Left = 148
  Top = 217
  HelpContext = 11
  ActiveControl = KeyWord
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'WordWeb'
  ClientHeight = 308
  ClientWidth = 439
  Ctl3D = False
  Color = clBtnFace
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  KeyPreview = True
  Menu = MainMenu
  Position = poDefault
  OnActivate = DoActivate
  OnClose = DoCLose
  OnCreate = DoCreate
  OnDestroy = DoDestroy
  OnHide = DoHide
  OnKeyDown = KeyDown
  OnShow = ShowWN
  PixelsPerInch = 96
  TextHeight = 16
  object Word: TLabel
    Left = 8
    Top = 16
    Width = 55
    Height = 16
    Caption = 'Loo&k up:'
    FocusControl = KeyWord
  end
  object NounButton: TSpeedButton
    Left = 344
    Top = 136
    Width = 21
    Height = 21
    Hint = 'Show nouns'
    AllowAllUp = True
    GroupIndex = 1
    Enabled = False
    Glyph.Data = {
      5C010000424D5C01000000000000760000002800000011000000110000000100
      040000000000CC00000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777730000007777777777777777730000007777777777777777730000007777
      0077777007777300000077770077770007777300000077770077700007777300
      0000777700777000077773000000777700770070077773000000777700700770
      0777730000007777007007700777730000007777000077700777730000007777
      0000777007777700000077770007777007777300000077770077777007777300
      000077777777777777777800000077777777777777777F000000777777777777
      7777730000000000000000000000000000000000000000000000000000000000}
    OnClick = ChangeFilter
  end
  object VerbButton: TSpeedButton
    Left = 344
    Top = 160
    Width = 21
    Height = 21
    Hint = 'Show verbs'
    AllowAllUp = True
    GroupIndex = 1
    Enabled = False
    Glyph.Data = {
      5C010000424D5C01000000000000760000002800000011000000110000000100
      040000000000CC00000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777700000007777777777777777700000007777777777777777700000007777
      7770007777777700000077777770007777777000000077777770007777777000
      0000777777007007777770000000777777007007777770000000777777007007
      7777700000007777700777007777700000007777700777007777700000007777
      7007770077777000000077770077777007777F00000077770077777007777000
      0000777777777777777770000000777777777777777770000000777777777777
      7777700000000000000000000000000000000000000000000000000000000000}
    OnClick = ChangeFilter
  end
  object AdjButton: TSpeedButton
    Left = 344
    Top = 184
    Width = 21
    Height = 21
    Hint = 'Show adjectives'
    AllowAllUp = True
    GroupIndex = 1
    Enabled = False
    Glyph.Data = {
      5C010000424D5C01000000000000760000002800000011000000110000000100
      040000000000CC00000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777730000007777777777777777730000007777777777777777730000007777
      0077777007777300000077770077777007777300000077770077777007777300
      0000777770000000777773000000777770000000777773000000777770077700
      7777730000007777770070077777730000007777770070077777730000007777
      7700700777777700000077777770007777777300000077777770007777777300
      000077777777777777777800000077777777777777777F000000777777777777
      7777730000000000000000000000000000000000000000000000000000000000}
    OnClick = ChangeFilter
  end
  object AdvButton: TSpeedButton
    Left = 344
    Top = 208
    Width = 21
    Height = 21
    Hint = 'Show adverbs'
    AllowAllUp = True
    GroupIndex = 1
    Enabled = False
    Glyph.Data = {
      5C010000424D5C01000000000000760000002800000011000000110000000100
      040000000000CC00000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      7777730000007777777777777777700000007777777777777777700000007777
      0077777000777300000077770077777007777300000077770077770007777300
      0000777700777000777773000000777700000007777773000000777700000000
      7777730000007777007777700777730000007777007777700777730000007777
      0077777007777300000077770000000007777300000077770000000077777300
      0000777777777777777773000000777777777777777773000000777777777777
      7777730000000000000000000000000000000000000000000000000000000000}
    OnClick = ChangeFilter
  end
  object KeyWord: TComboBox
    Left = 72
    Top = 8
    Width = 265
    Height = 24
    ItemHeight = 16
    MaxLength = 40
    TabOrder = 0
    OnChange = AllowSearch
  end
  object DefBox: TMemo
    Left = 8
    Top = 40
    Width = 329
    Height = 89
    Cursor = crArrow
    Ctl3D = True
    HideSelection = False
    ParentCtl3D = False
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 2
    OnKeyDown = KeySelectSense
    OnMouseUp = MouseUp
  end
  object CopyButton: TBitBtn
    Left = 344
    Top = 248
    Width = 89
    Height = 25
    Hint = 'Copy selected text to clipboard'
    Caption = '&Copy'
    Enabled = False
    TabOrder = 3
    OnClick = CopySelection
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
      FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
      007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
      7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
      99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
      99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
      99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
      93337FFFF7737777733300000033333333337777773333333333}
    NumGlyphs = 2
  end
  object SearchButton: TBitBtn
    Left = 344
    Top = 8
    Width = 89
    Height = 25
    Hint = 'Search for word'
    Caption = 'Search'
    Default = True
    Enabled = False
    TabOrder = 5
    OnClick = DoStuff
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      55555FF555FFFFFFF5FF0075500000005000775F57777777F7770B0550CC0090
      50E07F7F57FF77F7F7F70B055000000050E07F75F7777777F7F70B7750CC0090
      50E075F7F7F577F7F7F777B050CC009050E057F7F7F577F7F7F750B050CC0090
      50E057F757F577F7F7F750B770CC009050E0575F77F577F7F7F7577B00CC0090
      50E0557F77F577F7F7F7550B30CC00905000557F57FF77F7F777550B30000090
      50E05575F77777F7F7F7557000CC00905000555777FF77F7F777555550000090
      55555555577777F7F5555555555550005555555555555777F555555555555090
      55555555555557F7F555555555555000555555555555577755550000}
    NumGlyphs = 2
  end
  object CloseButton: TBitBtn
    Left = 344
    Top = 280
    Width = 89
    Height = 25
    Caption = 'Close'
    TabOrder = 4
    OnClick = ExitNow
    Glyph.Data = {
      78010000424D7801000000000000760000002800000020000000100000000100
      04000000000000000000120B0000120B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F3333333F7F333301111111B10333337F333333737F33330111111111
      0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
      0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
      0333337F377777337F333301111111110333337F333333337F33330111111111
      0333337FFFFFFFFF7F33330000000000033333777777777773330000}
    NumGlyphs = 2
  end
  object ViewTabs: TTabControl
    Left = 8
    Top = 130
    Width = 329
    Height = 175
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MultiLine = True
    ParentFont = False
    TabIndex = 0
    TabOrder = 1
    Tabs.Strings = (
      '')
    TabStop = False
    OnChange = TbChanged
    object Synonyms: TListBox
      Left = 4
      Top = 24
      Width = 321
      Height = 144
      Align = alClient
      BorderStyle = bsNone
      Ctl3D = True
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'System'
      Font.Style = []
      IntegralHeight = True
      ItemHeight = 16
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      OnClick = CheckCopyOK
      OnDblClick = ListSelected
      OnKeyDown = KeyListSelected
    end
  end
  object MainMenu: TMainMenu
    Left = 400
    Top = 152
    object PartMenu: TMenuItem
      Caption = 'Vie&w'
      Enabled = False
      HelpContext = 8
      ShortCut = 0
      object Nouns1: TMenuItem
        Caption = '&Nouns'
        Enabled = False
        HelpContext = 8
        ShortCut = 32846
        OnClick = MenuPartOfSpeech
      end
      object Verbs1: TMenuItem
        Caption = '&Verbs'
        Enabled = False
        HelpContext = 8
        ShortCut = 32854
        OnClick = MenuPartOfSpeech
      end
      object Adjectives1: TMenuItem
        Caption = '&Adjectives'
        Enabled = False
        HelpContext = 8
        ShortCut = 32833
        OnClick = MenuPartOfSpeech
      end
      object Adverbs1: TMenuItem
        Caption = 'Adve&rbs'
        Enabled = False
        HelpContext = 8
        ShortCut = 32850
        OnClick = MenuPartOfSpeech
      end
    end
    object ViewMenu: TMenuItem
      Caption = 'Wor&ds'
      Enabled = False
      HelpContext = 1
      ShortCut = 0
      object Antonyms1: TMenuItem
        Caption = 'An&tonyms'
        HelpContext = 1
        ShortCut = 32852
        Visible = False
        OnClick = ViewChanged
      end
      object Attribs1: TMenuItem
        Caption = 'Attri&bs'
        HelpContext = 1
        ShortCut = 32834
        Visible = False
        OnClick = ViewChanged
      end
      object Causes1: TMenuItem
        Caption = 'Ca&uses'
        HelpContext = 1
        ShortCut = 32853
        Visible = False
        OnClick = ViewChanged
      end
      object Derived1: TMenuItem
        Caption = '&Derived'
        HelpContext = 1
        ShortCut = 32836
        Visible = False
        OnClick = ViewChanged
      end
      object Entails1: TMenuItem
        Caption = '&Entails'
        HelpContext = 1
        ShortCut = 32837
        Visible = False
        OnClick = ViewChanged
      end
      object Holonyms1: TMenuItem
        Caption = '&Meronyms'
        HelpContext = 1
        ShortCut = 32845
        Visible = False
        OnClick = ViewChanged
      end
      object Hypernyms1: TMenuItem
        Caption = '&Hypernyms'
        HelpContext = 1
        ShortCut = 32840
        Visible = False
        OnClick = ViewChanged
      end
      object Hyponyms1: TMenuItem
        Caption = 'H&yponyms'
        HelpContext = 1
        ShortCut = 32857
        Visible = False
        OnClick = ViewChanged
      end
      object Meronyms1: TMenuItem
        Caption = 'H&olonyms'
        HelpContext = 1
        ShortCut = 32847
        Visible = False
        OnClick = ViewChanged
      end
      object Participle1: TMenuItem
        Caption = '&Participle'
        HelpContext = 1
        ShortCut = 32848
        Visible = False
        OnClick = ViewChanged
      end
      object SeeAlso1: TMenuItem
        Caption = 'See A&lso'
        HelpContext = 1
        ShortCut = 32844
        Visible = False
        OnClick = ViewChanged
      end
      object Similar1: TMenuItem
        Caption = 'S&imilar'
        HelpContext = 1
        ShortCut = 32841
        Visible = False
        OnClick = ViewChanged
      end
      object Synonyms1: TMenuItem
        Caption = '&Synonyms'
        HelpContext = 1
        ShortCut = 32851
        Visible = False
        OnClick = ViewChanged
      end
      object Anagrams1: TMenuItem
        Caption = 'Ana&gs'
        HelpContext = 13
        ShortCut = 32839
        Visible = False
        OnClick = ViewChanged
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      HelpContext = 10
      ShortCut = 0
      object RootsOnlyMenu: TMenuItem
        Caption = 'Show &roots only'
        HelpContext = 10
        ShortCut = 0
        OnClick = ShowOnlyRoots
      end
      object N1: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object ShowHintsMenu: TMenuItem
        Caption = 'Show &hints'
        HelpContext = 10
        ShortCut = 0
        OnClick = ShowHints
      end
      object StayOnTopItem: TMenuItem
        Caption = 'Stay on &top'
        HelpContext = 10
        ShortCut = 0
        OnClick = StayOnTopItemClick
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      HelpContext = 11
      ShortCut = 0
      object Contents1: TMenuItem
        Caption = '&Contents'
        HelpContext = 11
        ShortCut = 112
        OnClick = ShowHelp
      end
      object BBreak: TMenuItem
        Caption = '-'
        HelpContext = 11
        ShortCut = 0
      end
      object About1: TMenuItem
        Caption = '&About'
        HelpContext = 11
        ShortCut = 0
        OnClick = About1Click
      end
    end
  end
end